true 4

{currentfile blackbuf fhbinim{readstring}{readhexstring}ifelse pop}

{currentfile yellowbuf fhbinim{readstring}{readhexstring}ifelse pop}

{currentfile magentabuf fhbinim{readstring}{readhexstring}ifelse pop}

{currentfile cyanbuf fhbinim{readstring}{readhexstring}ifelse pop}

x0 fdh y0 sub dh sub translate w h bits[sx 0 0 sy neg 0 h]

/blackbuf cyanbuf length string def

/yellowbuf cyanbuf length string def

/magentabuf cyanbuf length string def

/cyanbuf w bits mul 7 add 8 idiv string def